BBS in a Box 12/BBS in a box XII-2.iso/Files II/Prog/B-C/C++ CDEV.sit/C++ CDEV ƒ/ScanCDEV.r/ScanCDEV.r

Text File | 1991-08-24 | 3.9 KB | 311 lines | [TEXT/MPS ]

/*
 *    ScanCDEV.r (MPW 3.2)
 *    Copyright ©1991 David Kreindler.  All rights reserved.
 *
 *    KNOWN BUGS AND SHORTCOMINGS:
 *        [none]
 */

#ifndef __SCANCDEVTYPES__
#include "ScanCDEVTypes.r"
#endif

#define cdevID (-4064)

#define cdevResID (-4048)

#define copyrightString "Copyright ©1991 David Kreindler.  All rights reserved"

#define nameString "ScanCDEV"

#define versNumString "1.0"

#define versString nameString " Version " versNumString "\n" copyrightString

resource 'BNDL' (cdevID, purgeable) {
    creator,
    0,
    {
        'ICN#',
        {
            0,
            cdevID
        },
        'FREF',
        {
            0,
            cdevID
        }
    }
};

data 'CURS' (cdevID) {
};

resource 'DITL' (cdevID, purgeable) {
    {
        {
            47,
            256,
            67,
            316
        },
        Button {
            enabled,
            "Scan"
        },
        {
            4,
            94,
            18,
            316
        },
        StaticText {
            disabled,
            "Status:"
        },
        {
            17,
            94,
            31,
            316
        },
        StaticText {
            disabled,
            "Directory:"
        },
        {
            30,
            94,
            44,
            316
        },
        StaticText {
            disabled,
            "File:"
        },
        {
            54,
            94,
            71,
            215
        },
        StaticText {
            disabled,
            nameString " Version " versNumString
        },
        {
            0,
            0,
            0,
            0
        },
        HelpItem {
            disabled,
            HMScanhdlg {
                cdevID
            }
        }
    }
};

resource 'FREF' (cdevID, purgeable) {
    'cdev',
    0,
    ""
};

resource 'hdlg' (cdevID) {
    HelpMgrVersion,
    0,
    HMDefaultOptions,
    0,
    0,
    HMSkipItem {
    },
    {
        HMStringResItem {        /* scan */
            {
                0,
                0
            },
            {
                0,
                0,
                0,
                0
            },
            cdevResID,
            1,
            0,
            0,
            0,
            0,
            0,
            0
        },
        HMStringResItem {        /* status */
            {
                0,
                0
            },
            {
                0,
                0,
                0,
                0
            },
            0,
            0,
            cdevResID,
            2,
            0,
            0,
            0,
            0
        },
        HMStringResItem {        /* directory */
            {
                0,
                0
            },
            {
                0,
                0,
                0,
                0
            },
            0,
            0,
            cdevResID,
            3,
            0,
            0,
            0,
            0
        },
        HMStringResItem {        /* file */
            {
                0,
                0
            },
            {
                0,
                0,
                0,
                0
            },
            0,
            0,
            cdevResID,
            4,
            0,
            0,
            0,
            0
        },
        HMStringResItem {        /* version */
            {
                0,
                0
            },
            {
                0,
                0,
                0,
                0
            },
            0,
            0,
            cdevResID,
            5,
            0,
            0,
            0,
            0
        }
    }
};

resource 'hfdr' (-5696, purgeable) {
    HelpMgrVersion,
    hmDefaultOptions,
    0,
    0,
    {
        HMSTRResItem {
            cdevResID
        }
    }
};

resource 'ICN#' (cdevID, purgeable) {
    {
        $"0000000000000000000000000000000000000000000000000000000000000020000000500000008800000104000002020000040100000802040010040A00200811004010208080204041004080220080401401002008020010000400080008000400100002002000010040000080800000410000002200000014000000080000",
        $"000000000000000000000000000000000000000000000000000000000000002000000070000000F8000001FC000003FE000007FF00000FFE04001FFC0E003FF81F007FF03F80FFE07FC1FFC0FFE3FF807FF7FF003FFFFE001FFFFC000FFFF80007FFF00003FFE00001FFC00000FF8000007F0000003E0000001C000000080000"
    }
};

resource 'ics#' (cdevID, purgeable) {
    {
        $"0000 0000 0000 0008 0014 0022 1041 2882 4504 8208 4010 2020 1040 0880 0500 02",
        $"0000 0000 0000 0008 001C 003E 107F 38FE 7DFC FFF8 7FF0 3FE0 1FC0 0F80 0700 02"
    }
};

resource 'mach' (cdevID, purgeable) {
    0xFFFF,
    0x0
};

resource 'nrct' (cdevID, purgeable) {
    {
        {
            -1,
            87,
            73,
            322
        }
    }
};

resource creator (0, purgeable) {
    versString
};

resource 'STR ' (cdevResID, purgeable) {
    "ScanCDEV is an example of a control panel device (cdev) written in C++.  \n"
    "All ScanCDEV does is scan the current HFS volume, listing each directory and file that it encounters."
};

resource 'STR#' (cdevResID, purgeable) {
    {
        "Press this button to scan every file in every directory of the current volume.",
        "This area shows ScanCDEV’s current status.",
        "This area shows the current directory.",
        "This area shows the current file.",
        "This area shows ScanCDEV’s version."
    }
};

resource 'vers' (1, purgeable) {
    0x1,
    0x0,
    release,
    0x0,
    verUS,
    versNumString,
    copyrightString
};

resource 'vers' (2, purgeable) {
    0x1,
    0x0,
    release,
    0x0,
    verUS,
    versNumString,
    nameString
};